\(\int \frac {1}{x^{14} (a-b x^4)^{3/4}} \, dx\) [1255]
Optimal result
Integrand size = 16, antiderivative size = 96 \[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=-\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}-\frac {4 b \sqrt [4]{a-b x^4}}{39 a^2 x^9}-\frac {32 b^2 \sqrt [4]{a-b x^4}}{195 a^3 x^5}-\frac {128 b^3 \sqrt [4]{a-b x^4}}{195 a^4 x}
\]
[Out]
-1/13*(-b*x^4+a)^(1/4)/a/x^13-4/39*b*(-b*x^4+a)^(1/4)/a^2/x^9-32/195*b^2*(-b*x^4+a)^(1/4)/a^3/x^5-128/195*b^3*
(-b*x^4+a)^(1/4)/a^4/x
Rubi [A] (verified)
Time = 0.02 (sec) , antiderivative size = 96, normalized size of antiderivative = 1.00,
number of steps used = 4, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.125, Rules used = {277, 270}
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=-\frac {128 b^3 \sqrt [4]{a-b x^4}}{195 a^4 x}-\frac {32 b^2 \sqrt [4]{a-b x^4}}{195 a^3 x^5}-\frac {4 b \sqrt [4]{a-b x^4}}{39 a^2 x^9}-\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}
\]
[In]
Int[1/(x^14*(a - b*x^4)^(3/4)),x]
[Out]
-1/13*(a - b*x^4)^(1/4)/(a*x^13) - (4*b*(a - b*x^4)^(1/4))/(39*a^2*x^9) - (32*b^2*(a - b*x^4)^(1/4))/(195*a^3*
x^5) - (128*b^3*(a - b*x^4)^(1/4))/(195*a^4*x)
Rule 270
Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[(c*x)^(m + 1)*((a + b*x^n)^(p + 1)/(a*
c*(m + 1))), x] /; FreeQ[{a, b, c, m, n, p}, x] && EqQ[(m + 1)/n + p + 1, 0] && NeQ[m, -1]
Rule 277
Int[(x_)^(m_)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[x^(m + 1)*((a + b*x^n)^(p + 1)/(a*(m + 1))), x]
- Dist[b*((m + n*(p + 1) + 1)/(a*(m + 1))), Int[x^(m + n)*(a + b*x^n)^p, x], x] /; FreeQ[{a, b, m, n, p}, x]
&& ILtQ[Simplify[(m + 1)/n + p + 1], 0] && NeQ[m, -1]
Rubi steps \begin{align*}
\text {integral}& = -\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}+\frac {(12 b) \int \frac {1}{x^{10} \left (a-b x^4\right )^{3/4}} \, dx}{13 a} \\ & = -\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}-\frac {4 b \sqrt [4]{a-b x^4}}{39 a^2 x^9}+\frac {\left (32 b^2\right ) \int \frac {1}{x^6 \left (a-b x^4\right )^{3/4}} \, dx}{39 a^2} \\ & = -\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}-\frac {4 b \sqrt [4]{a-b x^4}}{39 a^2 x^9}-\frac {32 b^2 \sqrt [4]{a-b x^4}}{195 a^3 x^5}+\frac {\left (128 b^3\right ) \int \frac {1}{x^2 \left (a-b x^4\right )^{3/4}} \, dx}{195 a^3} \\ & = -\frac {\sqrt [4]{a-b x^4}}{13 a x^{13}}-\frac {4 b \sqrt [4]{a-b x^4}}{39 a^2 x^9}-\frac {32 b^2 \sqrt [4]{a-b x^4}}{195 a^3 x^5}-\frac {128 b^3 \sqrt [4]{a-b x^4}}{195 a^4 x} \\
\end{align*}
Mathematica [A] (verified)
Time = 0.51 (sec) , antiderivative size = 54, normalized size of antiderivative = 0.56
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=\frac {\sqrt [4]{a-b x^4} \left (-15 a^3-20 a^2 b x^4-32 a b^2 x^8-128 b^3 x^{12}\right )}{195 a^4 x^{13}}
\]
[In]
Integrate[1/(x^14*(a - b*x^4)^(3/4)),x]
[Out]
((a - b*x^4)^(1/4)*(-15*a^3 - 20*a^2*b*x^4 - 32*a*b^2*x^8 - 128*b^3*x^12))/(195*a^4*x^13)
Maple [A] (verified)
Time = 4.50 (sec) , antiderivative size = 51, normalized size of antiderivative = 0.53
| | |
method | result | size |
| | |
gosper |
\(-\frac {\left (-b \,x^{4}+a \right )^{\frac {1}{4}} \left (128 b^{3} x^{12}+32 a \,b^{2} x^{8}+20 a^{2} b \,x^{4}+15 a^{3}\right )}{195 x^{13} a^{4}}\) |
\(51\) |
trager |
\(-\frac {\left (-b \,x^{4}+a \right )^{\frac {1}{4}} \left (128 b^{3} x^{12}+32 a \,b^{2} x^{8}+20 a^{2} b \,x^{4}+15 a^{3}\right )}{195 x^{13} a^{4}}\) |
\(51\) |
pseudoelliptic |
\(-\frac {\left (-b \,x^{4}+a \right )^{\frac {1}{4}} \left (128 b^{3} x^{12}+32 a \,b^{2} x^{8}+20 a^{2} b \,x^{4}+15 a^{3}\right )}{195 x^{13} a^{4}}\) |
\(51\) |
risch |
\(-\frac {\left (-b \,x^{4}+a \right )^{\frac {1}{4}} {\left (\left (-b \,x^{4}+a \right )^{3}\right )}^{\frac {1}{4}} \left (128 b^{3} x^{12}+32 a \,b^{2} x^{8}+20 a^{2} b \,x^{4}+15 a^{3}\right )}{195 a^{4} x^{13} {\left (-\left (b \,x^{4}-a \right )^{3}\right )}^{\frac {1}{4}}}\) |
\(78\) |
| | |
|
|
|
[In]
int(1/x^14/(-b*x^4+a)^(3/4),x,method=_RETURNVERBOSE)
[Out]
-1/195*(-b*x^4+a)^(1/4)*(128*b^3*x^12+32*a*b^2*x^8+20*a^2*b*x^4+15*a^3)/x^13/a^4
Fricas [A] (verification not implemented)
none
Time = 0.26 (sec) , antiderivative size = 50, normalized size of antiderivative = 0.52
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=-\frac {{\left (128 \, b^{3} x^{12} + 32 \, a b^{2} x^{8} + 20 \, a^{2} b x^{4} + 15 \, a^{3}\right )} {\left (-b x^{4} + a\right )}^{\frac {1}{4}}}{195 \, a^{4} x^{13}}
\]
[In]
integrate(1/x^14/(-b*x^4+a)^(3/4),x, algorithm="fricas")
[Out]
-1/195*(128*b^3*x^12 + 32*a*b^2*x^8 + 20*a^2*b*x^4 + 15*a^3)*(-b*x^4 + a)^(1/4)/(a^4*x^13)
Sympy [C] (verification not implemented)
Result contains complex when optimal does not.
Time = 1.36 (sec) , antiderivative size = 1928, normalized size of antiderivative = 20.08
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=\text {Too large to display}
\]
[In]
integrate(1/x**14/(-b*x**4+a)**(3/4),x)
[Out]
Piecewise((45*a**6*b**(37/4)*(a/(b*x**4) - 1)**(1/4)*exp(3*I*pi/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*
pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/
4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) - 75*a**5*b**(41/4)*x**4*(a/(b*x**4) - 1)**(1/4)*exp(3*I*p
i/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/
4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) + 51*a**4*
b**(45/4)*x**8*(a/(b*x**4) - 1)**(1/4)*exp(3*I*pi/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/
4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*
b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) + 231*a**3*b**(49/4)*x**12*(a/(b*x**4) - 1)**(1/4)*exp(3*I*pi/4)*gamma(-
13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**
5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) - 924*a**2*b**(53/4)*x
**16*(a/(b*x**4) - 1)**(1/4)*exp(3*I*pi/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a
**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**2
4*exp(3*I*pi/4)*gamma(3/4)) + 1056*a*b**(57/4)*x**20*(a/(b*x**4) - 1)**(1/4)*exp(3*I*pi/4)*gamma(-13/4)/(-256*
a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**2
0*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) - 384*b**(61/4)*x**24*(a/(b*x**4)
- 1)**(1/4)*exp(3*I*pi/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*e
xp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*g
amma(3/4)), Abs(a/(b*x**4)) > 1), (-45*a**6*b**(37/4)*(-a/(b*x**4) + 1)**(1/4)*gamma(-13/4)/(-256*a**7*b**9*x*
*12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi
/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) + 75*a**5*b**(41/4)*x**4*(-a/(b*x**4) + 1)**(1
/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4
) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) - 51*a**4*b
**(45/4)*x**8*(-a/(b*x**4) + 1)**(1/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*
b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*ex
p(3*I*pi/4)*gamma(3/4)) - 231*a**3*b**(49/4)*x**12*(-a/(b*x**4) + 1)**(1/4)*gamma(-13/4)/(-256*a**7*b**9*x**12
*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)
*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) + 924*a**2*b**(53/4)*x**16*(-a/(b*x**4) + 1)**(1/
4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4)
- 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)) - 1056*a*b**
(57/4)*x**20*(-a/(b*x**4) + 1)**(1/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3*I*pi/4)*gamma(3/4) + 768*a**6*b
**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma(3/4) + 256*a**4*b**12*x**24*exp
(3*I*pi/4)*gamma(3/4)) + 384*b**(61/4)*x**24*(-a/(b*x**4) + 1)**(1/4)*gamma(-13/4)/(-256*a**7*b**9*x**12*exp(3
*I*pi/4)*gamma(3/4) + 768*a**6*b**10*x**16*exp(3*I*pi/4)*gamma(3/4) - 768*a**5*b**11*x**20*exp(3*I*pi/4)*gamma
(3/4) + 256*a**4*b**12*x**24*exp(3*I*pi/4)*gamma(3/4)), True))
Maxima [A] (verification not implemented)
none
Time = 0.23 (sec) , antiderivative size = 73, normalized size of antiderivative = 0.76
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=-\frac {\frac {195 \, {\left (-b x^{4} + a\right )}^{\frac {1}{4}} b^{3}}{x} + \frac {117 \, {\left (-b x^{4} + a\right )}^{\frac {5}{4}} b^{2}}{x^{5}} + \frac {65 \, {\left (-b x^{4} + a\right )}^{\frac {9}{4}} b}{x^{9}} + \frac {15 \, {\left (-b x^{4} + a\right )}^{\frac {13}{4}}}{x^{13}}}{195 \, a^{4}}
\]
[In]
integrate(1/x^14/(-b*x^4+a)^(3/4),x, algorithm="maxima")
[Out]
-1/195*(195*(-b*x^4 + a)^(1/4)*b^3/x + 117*(-b*x^4 + a)^(5/4)*b^2/x^5 + 65*(-b*x^4 + a)^(9/4)*b/x^9 + 15*(-b*x
^4 + a)^(13/4)/x^13)/a^4
Giac [F]
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=\int { \frac {1}{{\left (-b x^{4} + a\right )}^{\frac {3}{4}} x^{14}} \,d x }
\]
[In]
integrate(1/x^14/(-b*x^4+a)^(3/4),x, algorithm="giac")
[Out]
integrate(1/((-b*x^4 + a)^(3/4)*x^14), x)
Mupad [B] (verification not implemented)
Time = 5.86 (sec) , antiderivative size = 80, normalized size of antiderivative = 0.83
\[
\int \frac {1}{x^{14} \left (a-b x^4\right )^{3/4}} \, dx=-\frac {{\left (a-b\,x^4\right )}^{1/4}}{13\,a\,x^{13}}-\frac {4\,b\,{\left (a-b\,x^4\right )}^{1/4}}{39\,a^2\,x^9}-\frac {128\,b^3\,{\left (a-b\,x^4\right )}^{1/4}}{195\,a^4\,x}-\frac {32\,b^2\,{\left (a-b\,x^4\right )}^{1/4}}{195\,a^3\,x^5}
\]
[In]
int(1/(x^14*(a - b*x^4)^(3/4)),x)
[Out]
- (a - b*x^4)^(1/4)/(13*a*x^13) - (4*b*(a - b*x^4)^(1/4))/(39*a^2*x^9) - (128*b^3*(a - b*x^4)^(1/4))/(195*a^4*
x) - (32*b^2*(a - b*x^4)^(1/4))/(195*a^3*x^5)